10 PRINT"[147][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]"
20 GOSUB 50000
30 PRINT"";BE$
40 GOTO20
50000 TI$="000000":BE$="":POKE198,0:POKE211,0:POKE214,18:SYS58732:PRINT"> [164]";
50010 GETX$:IFPEEK(203)=1THEN50110
50020 IFTI$>"000030"THEN50110
50030 IFX$=""THEN50010
50040 IFLEN(BE$)=0ANDASC(X$)=20THEN50010
50050 I=ASC(X$):IFI<65ORI>90THENIFI<>20ANDI<>32ANDI<>34THEN50010
50060 BE$=BE$+X$
50070 PRINTCHR$(20);X$;"[164]";
50080 IFI=20THENBE$=LEFT$(BE$,LEN(BE$)-2):GOTO50010
50090 TI$="000000":IFLEN(BE$)>76THENFORI=1TO80:PRINTCHR$(20);:NEXT:GOTO50000
50100 GOTO50010
50110 PRINT:PRINT"[145]                                        ";
50120 PRINT"                                        ":RETURN